home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
TeX 1995 July
/
TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO
/
macros
/
latex209
/
contrib
/
misc
/
rnl-slides.sty
< prev
next >
Wrap
Text File
|
1991-10-05
|
17KB
|
595 lines
Hallo,
Jemandem hat gefragt ob es m"oglich w"are einen Rand um einer TeXt
herum zu machen. Bernd hat als `hint' gegeben dass das mit
\@oddhead und \@evenhead geht.
Hierbei ist eine SliTeX Stylefile der genau dass macht. Warnung:
die File kann nicht ohne "Anderungen benutzt werden, denn es
versucht mit einem \special eine LN03-sixel-File zu lesen.
Aber vielleicht hilft es?
Mit freundlichem Gruss,
Johannes Braams
PTT Research Neher Laboratorium, P.O. box 421,
2260 AK Leidschendam, The Netherlands.
Phone : +31 70 3325051 E-mail : JL_Braams@pttrnl.nl
Fax : +31 70 3326477
-------------------------------------------------------------------------------
% RNL-slides DOCUMENT STYLE
% for SliTeX version 2.09
% Copyright (C) 1991 by Johannes Braams
% This style is based on the SLIDE style, Copyright (C) 1985 by Leslie Lamport
%
\def\fileversion{0.2}
\def\filedate{25 januari 1990}
\typeout{Documentstyle 'RNL-slides' version \fileversion\space <\filedate>}
\def\@notinslitex{\errmessage{This command not allowed in SLiTeX.}}
%page layout
\@twosidefalse
\topmargin -10pt
\oddsidemargin 17pt
\evensidemargin 17pt
\def\pl@twoside{\@latexerr{No 'twoside' layout for slides}\@eha}
\advance\hoffset by -1cm
\advance\voffset by -0.3cm
\headheight 0pt
\headsep 2.3pc
\footheight 0pt
\footskip 45pt
\newdimen\boxwidth\newdimen\boxheight
\boxwidth = 63.2pc \textwidth = \boxwidth \advance\textwidth by -4pc
\boxheight = 39.5pc \textheight = \boxheight \advance\textheight by -4.6pc
\columnwidth \textwidth
\columnsep 10pt
\columnseprule \z@
%footnotes
\skip\footins 10pt plus 2pt minus 4pt % Space between last line of text and
% top of first footnote.
% \skip\@mpfootins : plays same role for footnotes in a minipage as
% \skip\footins does for ordinary footnotes
\skip\@mpfootins = \skip\footins
\footnotesep 20pt % Height of strut placed at the beginning of every
% footnote.
%floats and marginpar
\marginparwidth 0pt
\marginparsep 0pt
\marginparpush 0pt
% ****************************************
% * FONTS *
% ****************************************
%
%
% Note that SLITeX uses a different font-naming and size-defining convention
% than LaTeX.
%
\font\trm lcmss8
\def\@mainsize{\@visibletrue\tiny}
\parindent 0pt
\def\baselinestretch{1}
\def\sc{\@noslifont\sc}
\def\@noslifont#1{\@warning{No \string#1\space type style in SLiTeX}}
\def\Huge{\huge}
\def\huge{\@nomath\huge\@LARGE\@huge\def\@currsize{\@huge}\rm
\baselineskip 60pt plus 10pt minus 6pt%
\lineskip 2pt%
\def\@parskip{60pt plus 30pt minus 6pt}%
\parskip\@parskip
\abovedisplayskip 24pt plus 10pt minus 6pt%
\belowdisplayskip 24pt plus 10pt minus 6pt%
\abovedisplayshortskip 12pt plus 8pt%
\belowdisplayshortskip 12pt plus 8pt%
\setbox\strutbox=\hbox{\vrule height27pt depth11pt width0pt}%
\baselineskip\baselinestretch\baselineskip
\normalbaselineskip\baselineskip}
\def\@huge{\if@visible\fortyonept\else\ifortyonept\fi}
\def\LARGE{\@nomath\LARGE\@LARGE\def\@currsize{\@LARGE}\rm
\baselineskip 52pt plus 10pt minus 6pt%
\lineskip 2pt%
\def\@parskip{52pt plus 30pt minus 6pt}%
\parskip\@parskip
\abovedisplayskip 24pt plus 10pt minus 6pt%
\belowdisplayskip 24pt plus 10pt minus 6pt%
\abovedisplayshortskip 12pt plus 8pt%
\belowdisplayshortskip 12pt plus 8pt%
\setbox\strutbox=\hbox{\vrule height27pt depth11pt width0pt}%
\baselineskip\baselinestretch\baselineskip
\normalbaselineskip\baselineskip}
\def\@LARGE{\if@visible\thirtyfourpt\else\ithirtyfourpt\fi}
\def\Large{\@nomath\Large\@Large\def\@currsize{\@Large}\rm
\baselineskip 48pt plus 10pt minus 6pt%
\lineskip 2pt%
\def\@parskip{48pt plus 30pt minus 6pt}%
\parskip\@parskip
\abovedisplayskip 24pt plus 10pt minus 6pt%
\belowdisplayskip 24pt plus 10pt minus 6pt%
\abovedisplayshortskip 12pt plus 8pt%
\belowdisplayshortskip 12pt plus 8pt%
\setbox\strutbox=\hbox{\vrule height27pt depth11pt width0pt}%
\baselineskip\baselinestretch\baselineskip
\normalbaselineskip\baselineskip}
\def\@Large{\if@visible\twentyninept\else\itwentyninept\fi}
\def\large{\@nomath\large\@large\def\@currsize{\@large}\rm
\baselineskip 42pt plus 8pt minus 5pt%
\lineskip 2pt%
\def\@parskip{40pt plus 20pt minus 4pt}%
\parskip\@parskip
\abovedisplayskip 20pt plus 8pt minus 3pt%
\belowdisplayskip 20pt plus 8pt minus 3pt%
\abovedisplayshortskip 10pt plus 5pt%
\belowdisplayshortskip 10pt plus 5pt%
\setbox\strutbox=\hbox{\vrule height20pt depth8.5pt width0pt}%
\baselineskip\baselinestretch\baselineskip
\normalbaselineskip\baselineskip}
\def\@large{\if@visible\twentyfourpt\else\itwentyfourpt\fi}
\def\normalsize{\@nomath\normalsize\@normalsize\def\@currsize{\@normalsize}\rm
\baselineskip 30pt plus 3pt minus 3pt%
\lineskip 2pt%
\def\@parskip{30pt plus 12pt minus 6pt}%
\parskip\@parskip
\abovedisplayskip 10pt plus 2pt minus 2pt%
\belowdisplayskip 6pt plus 2pt minus 2pt%
\abovedisplayshortskip 6pt plus 2pt%
\belowdisplayshortskip 6pt plus 2pt%
\setbox\strutbox=\hbox{\vrule height17pt depth7pt width0pt}%
\baselineskip\baselinestretch\baselineskip
\normalbaselineskip\baselineskip}
\def\@normalsize{\if@visible\twentypt\else\itwentypt\fi}
\def\small{\@nomath\small\@small\def\@currsize{\@small}\rm
\baselineskip 19pt plus 3pt minus 1pt%
\lineskip 2pt%
\def\@parskip{15pt plus 10pt minus 6pt}%
\parskip\@parskip
\abovedisplayskip 9pt plus 2pt minus 2pt%
\belowdisplayskip 6pt plus 2pt minus 2pt%
\abovedisplayshortskip 4pt plus 2pt%
\belowdisplayshortskip 4pt plus 2pt%
\setbox\strutbox=\hbox{\vrule height13.5pt depth5.6pt width0pt}%
\baselineskip\baselinestretch\baselineskip
\normalbaselineskip\baselineskip}
\def\@small{\if@visible\seventeenpt\else\iseventeenpt\fi}
\let\footnotesize=\small
\let\scriptsize=\small
\def\tiny{\@nomath\tiny\@tiny\def\@currsize{\@tiny}\rm
\baselineskip 16pt plus 2pt minus 1pt%
\lineskip 2pt%
\def\@parskip{11pt plus 11pt minus 5pt}%
\parskip\@parskip
\abovedisplayskip 9pt plus 2pt minus 6pt%
\belowdisplayskip 9pt plus 2pt minus 6pt%
\abovedisplayshortskip 0pt plus 2pt%
\belowdisplayshortskip 0pt plus 2pt%
\setbox\strutbox=\hbox{\vrule height10pt depth4pt width0pt}%
\baselineskip\baselinestretch\baselineskip
\normalbaselineskip\baselineskip}
\def\@tiny{\if@visible\fourteenpt\else\ifourteenpt\fi}
%
%\change{0.2a}{25/01/91}{Redefine {\tt\bsl @arrayparbox} to fit \SLiTeX}
%
\def\@arrayparboxrestore{\let\par\@@par
\let\-\@dischyph
\let\'\@acci \let\`\@accii \let\=\@acciii
\parindent\z@ \parskip\@parskip
\everypar{}\linewidth\hsize
\@totalleftmargin\z@ \leftskip\z@ \rightskip\z@ \@rightskip\z@
\parfillskip\@flushglue \lineskip\normallineskip
\baselineskip\normalbaselineskip\sloppy}
% ****************************************
% * PAGE STYLES *
% ****************************************
%
\newbox\rand
\setbox\rand=\vbox to\boxheight{\hsize\boxwidth\offinterlineskip
\rlap{\hbox{\rule[-2pt]{\boxwidth}{2pt}}}
\vskip-2pt
\rlap{\hbox to \boxwidth{\rule[-\boxheight]{2pt}{\boxheight}\hfill
\rule[-\boxheight]{2pt}{\boxheight}}}
\vskip-2pt
\rlap{\hbox{\rule{\boxwidth}{2pt}}}
}
\ht\rand=\z@ \dp\rand=\z@ \wd\rand=\z@
\newbox\l@g@
\setbox\l@g@\hbox to 122pt{%
\special{ln03:plotfile texinputs:research.six}\hfill\null}
\newbox\@slidenum
\def\pagebox#1{%
\setbox\@slidenum\vbox to 0pt{\vskip 18pt
\hbox{\hskip-33pt\trm 910128.#1}\vss}
\box\@slidenum}
%
% The page styles of slides is determined by the 'slide' page
% style, the slide environment executing a \thispagestyle{slide}
% command. The page styles of overlays and notes are similarly
% determined by 'overlay' and 'note' page styles. The command
% standard 'headings', 'plain' and 'empty' page styles work by
% redefining the 'slide', 'overlay', and 'note' styles.
%
\def\ps@headings{%
\def\ps@slide{%
\def\@oddfoot{\pagebox{\theslide}\hfill\copy\l@g@}
\def\@oddhead{\hskip-2pc\copy\rand\hfill\null}
\let\@evenfoot\@oddfoot
\let\@evenfoot\@oddfoot
}
\def\ps@overlay{%
\def\@oddfoot{\pagebox{\theoverlay}\hfill\copy\l@g@}
\def\@oddhead{\hskip-2pc\copy\rand\hfill\null}
\let\@evenfoot\@oddfoot
\let\@evenfoot\@oddfoot
}
\def\ps@note{%
\def\@oddfoot{\pagebox{\thenote}\hfill\copy\l@g@}
\def\@oddhead{\hskip-2pc\copy\rand\hfill\null}
\let\@evenfoot\@oddfoot
\let\@evenfoot\@oddfoot
}
}
\let\ps@plain\ps@headings
\let\ps@empty\ps@headings
%
%\def\ps@plain{\def\ps@slide{%
%\def\@oddfoot{\@mainsize \mtbox{}\hfil\hbox to 3em{\theslide\hss}}%
%\def\@oddhead{}%
%%\def\@evenfoot{\@mainsize \mbox{}\hfil\hbox to 3em{\theslide\hss}}%
%\def\@evenhead{}}
%\def\ps@overlay{\def\@oddfoot{\@mainsize
% \mbox{}\hfil\hbox to 3em{\theoverlay\hss}}%
%\def\@oddhead{}%
%\def\@evenfoot{\@mainsize \mbox{}\hfil\hbox to 3em{\theoverlay\hss}}%
%\def\@evenhead{}}
%\def\ps@note{\def\@oddfoot{\@mainsize \hbox{}\hfil\thenote}%
%\def\@oddhead{}%
%\def\@evenfoot{\@mainsize \hbox{}\hfil\thenote}%
%\def\@evenhead{}}}
%\def\ps@empty{%
%\def\ps@slide{\def\@oddhead{}\def\@oddfoot{}%
%\def\@evenhead{}\def\@evenfoot{}}%
%\def\ps@overlay{\def\@oddhead{}\def\@oddfoot{}%
%\def\@evenhead{}\def\@evenfoot{}}%
%\def\ps@note{\def\@oddhead{}\def\@oddfoot{}%
%\def\@evenhead{}\def\@evenfoot{}}}
% Default definition the 'slide', 'overlay', and 'note' page styles.
\ps@headings
% Set ordinary page style to 'empty'
%\def\@oddhead{}\def\@oddfoot{}%
%\def\@evenhead{}\def\@evenfoot{}
% The \@options command causes the execution of every command \ds@FOO
% which is defined and for which the user typed the FOO option in his
% \documentstyle command. For every option BAR he typed for which
% \ds@BAR is not defined, the file BAR.sty will be read after the present
% (main) .STY file is executed.
\@options
% ****************************************
% * ENVIRONMENTS *
% ****************************************
%
% titlepage
%
\def\titlepage{\newpage\thispagestyle{empty}\c@page\z@}
\def\endtitlepage{\newpage}
% Default values for list environment.
\leftmargini 38pt
\leftmarginii 30pt
\leftmarginiii 20pt
\leftmarginiv 15pt
\leftmarginv 15pt
\leftmarginvi 10pt
\labelsep 10pt
\tabbingsep \labelsep
\def\@listi{\leftmargin\leftmargini
\labelwidth\leftmargini\advance\labelwidth-\labelsep
\parsep .5\parskip
\topsep \parsep
\itemsep\parskip
\partopsep 0pt}
\def\@listii{\leftmargin\leftmarginii
\labelwidth\leftmarginii\advance\labelwidth-\labelsep
\parsep .5\parskip
\topsep \parsep
\itemsep\parskip}
\def\@listiii{\leftmargin\leftmarginiii
\labelwidth\leftmarginiii\advance\labelwidth-\labelsep}
\def\@listiv{\leftmargin\leftmarginiv
\labelwidth\leftmarginiv\advance\labelwidth-\labelsep}
\def\@listv{\leftmargin\leftmarginv
\labelwidth\leftmarginv\advance\labelwidth-\labelsep}
\def\@listvi{\leftmargin\leftmarginvi
\labelwidth\leftmarginvi\advance\labelwidth-\labelsep}
% PARAGRAPH-FORMATTING ENVIRONMENTS
% ---------------------------------
% VERSE
% \CR ends line
% Line continuations indented further.
% Blank line makes new paragraph with \parskip space
%
\def\verse{\let\\=\@centercr \list{}{\itemsep\z@
\itemindent -15pt\listparindent \itemindent
\rightmargin\leftmargin\advance\leftmargin 15pt}\item[]}
\let\endverse\endlist
% QUOTATION
% Fills lines
% Indents paragraph
%
\def\quotation{\list{}{\listparindent 20pt\relax\itemindent\listparindent
\rightmargin\leftmargin}\item[]}
\let\endquotation=\endlist
% QUOTE -- same as quotation except no paragraph indentation,
\def\quote{\list{}{\rightmargin\leftmargin}\item[]}
\let\endquote=\endlist
% LIST-MAKING ENVIRONMENTS
% ------------------------
%
% DESCRIPTION
%
% To change the formatting of the label, you must redefine
% \descriptionlabel.
\def\descriptionlabel#1{\hspace\labelsep \bf #1}
\def\description{\list{}{\labelwidth\z@ \itemindent-\leftmargin
\let\makelabel\descriptionlabel}}
\let\enddescription\endlist
% ENUMERATE
% Enumeration is done with four counters: enumi, enumii, enumiii
% and enumiv, where enumN controls the numbering of the Nth level
% enumeration. The label is generated by the commands \labelenumi
% ... \labelenumiv. The expansion of \p@enumN\theenumN defines the
% output of a \ref command.
\def\labelenumi{\arabic{enumi}.}
\def\theenumi{\arabic{enumi}}
\def\labelenumii{(\alph{enumii})}
\def\theenumii{\alph{enumii}}
\def\p@enumii{\theenumi}
\def\labelenumiii{\roman{enumiii}.}
\def\theenumiii{\roman{enumiii}}
\def\p@enumiii{\theenumi(\theenumii)}
\def\labelenumiv{\Alph{enumiv}.}
\def\theenumiv{\Alph{enumiv}}
\def\p@enumiv{\p@enumiii\theenumiii}
% ITEMIZE
% Itemization is controlled by four commands: \labelitemi, \labelitemii,
% \labelitemiii, and \labelitemiv, which define the labels of the various
% itemization levels.
\def\labelitemi{$\bullet$}
\def\labelitemii{\bf --}
\def\labelitemiii{$\ast$}
\def\labelitemiv{$\cdot$}
%\change{0.2}{26/01/91}{Added {\tt\bsl freelines} and {\tt centerlist}
% environment}
% CENTERLIST
%
\def\freelines{\@rightskip 0\p@ plus 2em \rightskip\@rightskip}%
% \leftskip\z@%
% \parindent\z@%
% \parfillskip = 0.1\hsize plus 1fil%
% \parskip\z@}%
\def\centerlist#1#2{\center\minipage[t]{#2}
\freelines%\leftmargini=0pt
\csname #1\endcsname
\def\endcenterlist{\csname end#1\endcsname\endminipage\endcenter}}
\def\vcenter{\null\vfill}
\def\endvcenter{\vfill\null}
% Theorem environments
% \@begintheorem ... \@endtheorem are the commands executed at the
% beginning and end of a (user-defined) theorem-like environment.
% Except \@opargbegintheorem is executed when an optional argument is
% given. Cf. LATEX.TEX.
%
% \def\@begintheorem#1#2{\it \trivlist \item[\hskip \labelsep{\bf #1\ #2}]}
% \def\@opargbegintheorem#1#2#3{\it \trivlist
% \item[\hskip \labelsep{\bf #1\ #2\ (#3)}]}
% \def\@endtheorem{\endtrivlist}
% Array and tabular environment parameters
\arraycolsep 8pt
\tabcolsep 10pt
\arrayrulewidth .6pt
\doublerulesep 3pt
% \fbox parameters
\fboxsep = 5pt
\fboxrule = .6pt
% Date
\def\today{\ifcase\month\or
January\or February\or March\or April\or May\or June\or
July\or August\or September\or October\or November\or December\fi
\space\number\day, \number\year}
% ****************************************
% * FOOTNOTES *
% ****************************************
%
% Following makes footnotes numbered *, dagger, etc., with numbering
% begun again on every slide, note, or overlay.
\def\thefootnote{\fnsymbol{footnote}}
\@addtoreset{footnote}{slide}
\@addtoreset{footnote}{overlay}
\@addtoreset{footnote}{note}
% \footnoterule is a macro to draw the rule separating the footnotes from
% the text. It should take zero vertical space, so it needs a negative
% skip to compensate for any positive space taken by the rule. (See
% PLAIN.TEX.) The resulting rule will appear on all color layers, so
% it's best not to draw a rule.
\let\footnoterule=\relax
% \@makefntext{NOTE} :
% Must produce the actual footnote, using \@thefnmark as the mark
% of the footnote and NOTE as the text. It is called when effectively
% inside a \parbox of width \columnwidth (i.e., with \hsize =
% \columnwidth). The following macro indents
% all lines of the footnote by 10pt, and indents the first line of
% a new paragraph by 1em. To change these dimensions, just substitute
% the desired value for '10pt' [in both places] or '1em'.
% The mark is flushright against the footnote.
%
% It is much easier to write a macro in which the footnote text is
% set like an ordinary text paragraph, with no indentation except
% on the first line of a paragraph, and the first line of the
% footnote. In that case, all the macro must do is set \parindent
% to the appropriate value for succeeding paragraphs and put the
% proper indentation before mark.
\long\def\@makefntext#1{\noindent % Macro to make the text of a footnote
\hangindent 10pt\hbox
to 10pt{\hss $^{\@thefnmark}$}#1}
% \@makefnmark : A macro to generate the footnote marker that goes
% in the text.
\def\theequation{\@arabic{\c@equation}}
% The following stuff isn't used, but needs to be defined.
\def\@figsep{7pt}
\def\@textfigsep{5pt}
\def\@captionskip{6pt}
\def\topfraction{.7}
\def\bottomfraction{.3}
\def\textfraction{.2}
\def\floatpagefraction{.5}
\def\dbltopfraction{.7}
\def\dblfloatpagefraction{.5}
% ****************************************
% * INITIALIZATION *
% ****************************************
%
% Default initializations
\pagenumbering{arabic}
\onecolumn
\normalsize